Allow user customization to affect display of *Find* buffer.

* lisp/find-dired.el (find-dired): Use 'pop-to-buffer-same-window'
instead of 'switch-to-buffer'.

diff --git a/lisp/find-dired.el b/lisp/find-dired.el
index ebd14b075796af97384de236ddb228925198201b..9a798b0e39985dc87898961b6880ccc6a929a70a 100644 (file)
--- a/lisp/find-dired.el
+++ b/lisp/find-dired.el
@@ -144,7 +144,7 @@ use in place of \"-ls\" as the final argument."
     ;; Check that it's really a directory.
     (or (file-directory-p dir)
        (error "find-dired needs a directory: %s" dir))
-    (switch-to-buffer (get-buffer-create "*Find*"))
+    (pop-to-buffer-same-window (get-buffer-create "*Find*"))
 
     ;; See if there's still a `find' running, and offer to kill
     ;; it first, if it is.